; Music of Solar Invasion (1990) (Mastertronic) (Timothy Follin)
; Ripped by Megachur the 12/02/2007

	write "SOLARINV.BIN"

music_date_rip	equ &0c27
music_adr	equ &1a1d
first_theme	equ 0
last_theme	equ 1

	read "music_header_v1_0.asm"

.l1a23 equ $ + 6
.l1a21 equ $ + 4
.l1a1f equ $ + 2
.l1a1d
	db #00,#00,#00,#00,#00,#00,#00,#00
.l1a2c equ $ + 7
.l1a2b equ $ + 6
.l1a2a equ $ + 5
.l1a29 equ $ + 4
.l1a27 equ $ + 2
.l1a25
	db #00,#00,#00,#00,#00,#00,#00,#00
.l1a34 equ $ + 7
.l1a33 equ $ + 6
.l1a32 equ $ + 5
.l1a31 equ $ + 4
.l1a30 equ $ + 3
.music_end equ $ + 2      ; ?
.l1a2f equ $ + 2
.l1a2e equ $ + 1
.l1a2d
	db #00,#00,#00,#00,#00,#00,#00,#00
.l1a3c equ $ + 7
.l1a3b equ $ + 6
.l1a3a equ $ + 5
.l1a39 equ $ + 4
.l1a38 equ $ + 3
.l1a37 equ $ + 2
.l1a36 equ $ + 1
.l1a35
	db #00,#00,#00,#00,#00,#00,#00,#00
.l1a44 equ $ + 7
.l1a43 equ $ + 6
.l1a42 equ $ + 5
.l1a41 equ $ + 4
.l1a40 equ $ + 3
.l1a3f equ $ + 2
.l1a3e equ $ + 1
.l1a3d
	db #00,#00,#00,#00,#00,#00,#00,#00
.l1a4c equ $ + 7
.l1a4b equ $ + 6
.l1a4a equ $ + 5
.l1a49 equ $ + 4
.l1a48 equ $ + 3
.l1a47 equ $ + 2
.l1a46 equ $ + 1
.l1a45
	db #00,#00,#00,#00,#00,#00,#00,#00
.l1a54 equ $ + 7
.l1a53 equ $ + 6
.l1a52 equ $ + 5
.l1a51 equ $ + 4
.l1a50 equ $ + 3
.l1a4f equ $ + 2
.l1a4e equ $ + 1
.l1a4d
	db #00,#00,#00,#00,#00,#00,#00,#00
.l1a5c equ $ + 7
.l1a5b equ $ + 6
.l1a5a equ $ + 5
.l1a59 equ $ + 4
.l1a58 equ $ + 3
.l1a57 equ $ + 2
.l1a56 equ $ + 1
.l1a55
	db #00,#00,#00,#00,#00,#00,#00,#00
.l1a64 equ $ + 7
.l1a63 equ $ + 6
.l1a62 equ $ + 5
.l1a61 equ $ + 4
.l1a60 equ $ + 3
.l1a5f equ $ + 2
.l1a5e equ $ + 1
.l1a5d
	db #00,#00,#00,#00,#00,#00,#00,#00
.l1a6c equ $ + 7
.l1a6b equ $ + 6
.l1a6a equ $ + 5
.l1a69 equ $ + 4
.l1a68 equ $ + 3
.l1a67 equ $ + 2
.l1a66 equ $ + 1
.l1a65
	db #00,#00,#00,#00,#00,#00,#00,#00
.l1a74 equ $ + 7
.l1a73 equ $ + 6
.l1a72 equ $ + 5
.l1a71 equ $ + 4
.l1a70 equ $ + 3
.l1a6f equ $ + 2
.l1a6e equ $ + 1
.l1a6d
	db #00,#00,#00,#00,#00,#00,#00,#00
.l1a7c equ $ + 7
.l1a7b equ $ + 6
.l1a7a equ $ + 5
.l1a79 equ $ + 4
.l1a78 equ $ + 3
.l1a77 equ $ + 2
.l1a76 equ $ + 1
.l1a75
	db #00,#00,#00,#00,#00,#00,#00,#00
.l1a84 equ $ + 7
.l1a83 equ $ + 6
.l1a82 equ $ + 5
.l1a81 equ $ + 4
.l1a80 equ $ + 3
.l1a7f equ $ + 2
.l1a7e equ $ + 1
.l1a7d
	db #00,#00,#00,#00,#00,#00,#00,#00
.l1a8c equ $ + 7
.l1a8b equ $ + 6
.l1a8a equ $ + 5
.l1a89 equ $ + 4
.l1a88 equ $ + 3
.l1a87 equ $ + 2
.l1a86 equ $ + 1
.l1a85
	db #00,#00,#00,#00,#00,#00,#00,#00
.l1a94 equ $ + 7
.l1a93 equ $ + 6
.l1a92 equ $ + 5
.l1a91 equ $ + 4
.l1a90 equ $ + 3
.l1a8f equ $ + 2
.l1a8e equ $ + 1
.l1a8d
	db #00,#00,#00,#00,#00,#00,#00,#00
.l1a9c equ $ + 7
.l1a9b equ $ + 6
.l1a9a equ $ + 5
.l1a99 equ $ + 4
.l1a98 equ $ + 3
.l1a97 equ $ + 2
.l1a96 equ $ + 1
.l1a95
	db #00,#00,#00,#00,#00,#00,#00,#00
.l1aa4 equ $ + 7
.l1aa3 equ $ + 6
.l1aa2 equ $ + 5
.l1aa1 equ $ + 4
.l1aa0 equ $ + 3
.l1a9f equ $ + 2
.l1a9e equ $ + 1
.l1a9d
	db #00,#00,#00,#00,#00,#00,#00,#00
.l1aa9 equ $ + 4
.l1aa8 equ $ + 3
.l1aa7 equ $ + 2
.l1aa6 equ $ + 1
.l1aa5
	db #00,#00,#00,#00,#00
;
.init_music	;a=0,1
;
	add a
	ld c,a
	ld b,#00
	ld hl,l2774
	add hl,bc
	ld e,(hl)
	inc hl
	ld d,(hl)
	ld (l1a1d),de
	ld hl,l2778
	add hl,bc
	ld e,(hl)
	inc hl
	ld d,(hl)
	ld (l1a1f),de
	ld hl,l277c
	add hl,bc
	ld e,(hl)
	inc hl
	ld d,(hl)
	ld (l1a21),de
	ld a,#ff
	ld (l1a2f),a
	ld (l1a30),a
	ld (l1a31),a
.l1ada
	ld (l1a56),a
	ld (l1a57),a
	ld (l1a58),a
	ld hl,l1a32
	ld de,l1a33
	ld bc,#0025
	ld (hl),#00
	ldir
	ld a,#01
	ld (l1a53),a
	ld (l1a54),a
	ld (l1a55),a
	ld a,#09
	ld (l1a9b),a
	sla a
	ld (l1a9c),a
	sla a
	ld (l1a9d),a
	ld hl,l2336
	ld (l2334),hl
	ld hl,l247d
	ld (l247b),hl
	ld hl,l25d4
	ld (l25d2),hl
	ret
;
.stop_music
;
	ld c,#00
	ld a,#08
	call l269e
	ld c,#00
	ld a,#09
	call l269e
	ld c,#00
	ld a,#0a
	call l269e
	xor a
	ld (l1a2f),a
	ld (l1a30),a
	ld (l1a31),a
	dec a
	jp l1ada
	add a
	ld hl,l2780
	call l1b73
	ld a,(hl)
	inc hl
	ld h,(hl)
	ld l,a
.l1b4b
	ex de,hl
	ld a,(de)
	or a
	ret m
	srl a
	ld hl,l1a2f
	call l1b73
	ld (hl),#ff
	ld hl,l1a53
	ld a,(de)
	srl a
	call l1b73
	ld (hl),#01
	ld a,(de)
	ld hl,l1a1d
	call l1b73
	inc de
	ex de,hl
	ldi
	ldi
	jr l1b4b
.l1b73
	add l
	ld l,a
	ret nc
	inc h
	ret
;
.play_music	;1b78
;
	ld a,(l1a2f)
	or a
	jp p,l1dd4
	ld a,(l1a74)
	or a
	jp nz,l1ba9
	ld hl,l1a77
	dec (hl)
	jp p,l1bcf
	ld a,(l1a68)
	ld (hl),a
	ld hl,l1a5c
	inc (hl)
	ld a,(hl)
	cp #0f
	jp nz,l1bcf
	ld a,#01
	ld (l1a74),a
	ld a,(l1a69)
	ld (l1a77),a
	jp l1bcf
.l1ba9
	cp #01
	jp nz,l1bcf
	ld hl,l1a77
	dec (hl)
	jp p,l1bcf
	ld a,(l1a69)
	ld (hl),a
	ld a,(l1a5c)
	ld hl,l1a6e
	cp (hl)
	jp z,l1bca
	dec a
	ld (l1a5c),a
	jp p,l1bcf
.l1bca
	ld a,#02
	ld (l1a74),a
.l1bcf
	ld a,(l1a5c)
	ld c,a
	ld a,#08
	call l269e
	ld a,(l1a4a)
	or a
	jp z,l1c07
	ld a,(l1a95)
	or a
	jp z,l1c07
	dec a
	ld (l1a95),a
	jp nz,l1cd5
	ld a,(l1a29)
	ld c,a
	xor a
	call l269e
	ld a,(l1a2a)
	ld c,a
	ld a,#01
	call l269e
	ld a,(l1a9e)
	ld (l1a9b),a
	call l2290
.l1c07
	ld a,(l1a47)
	or a
	jp z,l1c5a
	ld a,(l1a80)
	or a
	jp z,l1c1c
	dec a
	ld (l1a80),a
	jp nz,l1c5a
.l1c1c
	ld hl,(l1a29)
	ld de,(l1a83)
	ld d,#00
	ld a,(l1a5f)
	or a
	jp z,l1c30
	add hl,de
	jp l1c32
.l1c30
	sbc hl,de
.l1c32
	ld (l1a29),hl
	ld c,l
	xor a
	call l269e
	ld c,h
	ld a,#01
	call l269e
	ld hl,l1a86
	dec (hl)
	jp nz,l1c90
	ld a,(l1a89)
	or a
	jp z,l1c90
	add a
	ld (hl),a
	ld a,(l1a5f)
	cpl
	ld (l1a5f),a
	jp l1c90
.l1c5a
	ld a,(l1a3b)
	or a
	jp z,l1c90
	dec a
	ld (l1a3b),a
	jp nz,l1c90
	ld a,(l1a3e)
	ld (l1a3b),a
	ld a,(l1a7a)
	ld l,a
	ld a,(l1a5f)
	xor #ff
	ld (l1a5f),a
	ld a,(l1a62)
	jp z,l1c84
	add l
	jp l1cb3
.l1c84
	sub l
	push af
	ld a,(l1a41)
	ld (l1a3b),a
	pop af
	jp l1cb3
.l1c90
	ld a,(l1a44)
	or a
	jp z,l1cd5
	ld hl,l1a7d
	ld e,a
	ld a,(l1a62)
	cp (hl)
	jp z,l1cd5
	jp c,l1cad
	sub e
	cp (hl)
	jp nc,l1cb3
	jp l1cb2
.l1cad
	add e
	cp (hl)
	jp c,l1cb3
.l1cb2
	ld a,(hl)
.l1cb3
	ld (l1a62),a
	add a
	ld e,a
	ld d,#00
	ld hl,l26bc
	add hl,de
	ld e,(hl)
	inc hl
	ld d,(hl)
	ld hl,(l1a50)
	ld h,#00
	add hl,de
	ld (l1a29),hl
	ld c,l
	xor a
	call l269e
	ld c,h
	ld a,#01
	call l269e
.l1cd5
	ld hl,l1a53
	dec (hl)
	push af
	ld a,(l1aa1)
	cp (hl)
	ld hl,l1aa4
	jr z,l1ce8
	ld a,(hl)
	or a
	jp nz,l1cf1
.l1ce8
	ld a,#09
	ld (l1a9b),a
	call l2290
	inc (hl)
.l1cf1
	dec (hl)
	pop af
	jp nz,l1dd4
	ld bc,(l1a1d)
.l1cfa
	ld a,(bc)
	inc bc
	or a
	jp p,l1d0f
	and #7f
	add a
	ld e,a
	ld d,#00
	ld hl,l22b9
	add hl,de
	ld e,(hl)
	inc hl
	ld d,(hl)
	ex de,hl
	jp (hl)
.l1d0f
	ld l,a
	ld a,(l1a38)
	or a
	jp z,l1d1e
	xor a
	ld (l1a38),a
	jp l1d21
.l1d1e
	ld a,(l1a32)
.l1d21
	add l
	ld l,a
	ld a,(l1a44)
	or a
	ld a,l
	jp z,l1d31
	ld (l1a7d),a
	ld a,(l1a62)
.l1d31
	ld (l1a62),a
	add a
	push bc
	ld e,a
	ld d,#00
	ld hl,l26bc
	add hl,de
	ld e,(hl)
	inc hl
	ld d,(hl)
	ld hl,(l1a50)
	ld h,#00
	add hl,de
	ld (l1a29),hl
	ld c,l
	xor a
	call l269e
	ld c,h
	ld a,#01
	call l269e
	pop bc
	ld a,(l1a35)
	or a
	jp nz,l1d5e
	ld a,(bc)
	inc bc
.l1d5e
	ld (l1a53),a
	ld (l1a1d),bc
	ld a,(l1a3e)
	ld (l1a3b),a
	ld a,(l1aa7)
	ld (l1aa4),a
	ld a,(l1a9e)
	ld (l1a9b),a
	call l2290
	ld a,(l1a47)
	or a
	jp z,l1d8d
	ld (l1a80),a
	ld a,(l1a89)
	ld (l1a86),a
	ld a,(l1a8c)
.l1d8d
	ld (l1a5f),a
	ld a,(l1a59)
	or a
	jp z,l1db0
	ld a,(l1a71)
	ld (l1a74),a
	or a
	ld a,(l1a68)
	jp z,l1da7
	ld a,(l1a69)
.l1da7
	ld (l1a77),a
	ld a,(l1a65)
	ld (l1a5c),a
.l1db0
	ld a,(l1a4a)
	or a
	jp z,l1dd4
	ld (l1a95),a
	ld a,(l1a98)
	ld (l1a9b),a
	call l2290
	ld a,(l1a8f)
	ld c,a
	xor a
	call l269e
	ld a,(l1a90)
	ld c,a
	ld a,#01
	call l269e
.l1dd4
	ld a,(l1a30)
	or a
	jp p,l2035
	ld a,(l1a75)
	or a
	jp nz,l1e05
	ld hl,l1a78
	dec (hl)
	jp p,l1e2b
	ld a,(l1a6a)
	ld (hl),a
	ld hl,l1a5d
	inc (hl)
	ld a,(hl)
	cp #0f
	jp nz,l1e2b
	ld a,#01
	ld (l1a75),a
	ld a,(l1a6b)
	ld (l1a78),a
	jp l1e2b
.l1e05
	cp #01
	jp nz,l1e2b
	ld hl,l1a78
	dec (hl)
	jp p,l1e2b
	ld a,(l1a6b)
	ld (hl),a
	ld a,(l1a5d)
	ld hl,l1a6f
	cp (hl)
	jp z,l1e26
	dec a
	ld (l1a5d),a
	jp p,l1e2b
.l1e26
	ld a,#02
	ld (l1a75),a
.l1e2b
	ld a,(l1a5d)
	ld c,a
	ld a,#09
	call l269e
	ld a,(l1a4b)
	or a
	jp z,l1e64
	ld a,(l1a96)
	or a
	jp z,l1e64
	dec a
	ld (l1a96),a
	jp nz,l1f34
	ld a,(l1a2b)
	ld c,a
	ld a,#02
	call l269e
	ld a,(l1a2c)
	ld c,a
	ld a,#03
	call l269e
	ld a,(l1a9f)
	ld (l1a9c),a
	call l2290
.l1e64
	ld a,(l1a48)
	or a
	jp z,l1eb8
	ld a,(l1a81)
	or a
	jp z,l1e79
	dec a
	ld (l1a81),a
	jp nz,l1eb8
.l1e79
	ld hl,(l1a2b)
	ld de,(l1a84)
	ld d,#00
	ld a,(l1a60)
	or a
	jp z,l1e8d
	add hl,de
	jp l1e8f
.l1e8d
	sbc hl,de
.l1e8f
	ld (l1a2b),hl
	ld c,l
	ld a,#02
	call l269e
	ld c,h
	ld a,#03
	call l269e
	ld hl,l1a87
	dec (hl)
	jp nz,l1eee
	ld a,(l1a8a)
	or a
	jp z,l1eee
	add a
	ld (hl),a
	ld a,(l1a60)
	cpl
	ld (l1a60),a
	jp l1eee
.l1eb8
	ld a,(l1a3c)
	or a
	jp z,l1eee
	dec a
	ld (l1a3c),a
	jp nz,l1eee
	ld a,(l1a3f)
	ld (l1a3c),a
	ld a,(l1a7b)
	ld l,a
	ld a,(l1a60)
	xor #ff
	ld (l1a60),a
	ld a,(l1a63)
	jp z,l1ee2
	add l
	jp l1f11
.l1ee2
	sub l
	push af
	ld a,(l1a42)
	ld (l1a3c),a
	pop af
	jp l1f11
.l1eee
	ld a,(l1a45)
	or a
	jp z,l1f34
	ld hl,l1a7e
	ld e,a
	ld a,(l1a63)
	cp (hl)
	jp z,l1f34
	jp c,l1f0b
	sub e
	cp (hl)
	jp nc,l1f11
	jp l1f10
.l1f0b
	add e
	cp (hl)
	jp c,l1f11
.l1f10
	ld a,(hl)
.l1f11
	ld (l1a63),a
	add a
	ld e,a
	ld d,#00
	ld hl,l26bc
	add hl,de
	ld e,(hl)
	inc hl
	ld d,(hl)
	ld hl,(l1a51)
	ld h,#00
	add hl,de
	ld (l1a2b),hl
	ld c,l
	ld a,#02
	call l269e
	ld c,h
	ld a,#03
	call l269e
.l1f34
	ld hl,l1a54
	dec (hl)
	push af
	ld a,(l1aa2)
	cp (hl)
	ld hl,l1aa5
	jr z,l1f47
	ld a,(hl)
	or a
	jp nz,l1f50
.l1f47
	ld a,#12
	ld (l1a9c),a
	call l2290
	inc (hl)
.l1f50
	dec (hl)
	pop af
	jp nz,l2035
	ld bc,(l1a1f)
.l1f59
	ld a,(bc)
	inc bc
	or a
	jp p,l1f6e
	and #7f
	add a
	ld e,a
	ld d,#00
	ld hl,l2400
	add hl,de
	ld e,(hl)
	inc hl
	ld d,(hl)
	ex de,hl
	jp (hl)
.l1f6e
	ld l,a
	ld a,(l1a39)
	or a
	jp z,l1f7d
	xor a
	ld (l1a39),a
	jp l1f80
.l1f7d
	ld a,(l1a33)
.l1f80
	add l
	ld l,a
	ld a,(l1a45)
	or a
	ld a,l
	jp z,l1f90
	ld (l1a7e),a
	ld a,(l1a63)
.l1f90
	ld (l1a63),a
	add a
	push bc
	ld e,a
	ld d,#00
	ld hl,l26bc
	add hl,de
	ld e,(hl)
	inc hl
	ld d,(hl)
	ld hl,(l1a51)
	ld h,#00
	add hl,de
	ld (l1a2b),hl
	ld c,l
	ld a,#02
	call l269e
	ld c,h
	ld a,#03
	call l269e
	pop bc
	ld a,(l1a36)
	or a
	jp nz,l1fbe
	ld a,(bc)
	inc bc
.l1fbe
	ld (l1a54),a
	ld (l1a1f),bc
	ld a,(l1a3f)
	ld (l1a3c),a
	ld a,(l1aa8)
	ld (l1aa5),a
	ld a,(l1a9f)
	ld (l1a9c),a
	call l2290
	ld a,(l1a48)
	or a
	jp z,l1fed
	ld (l1a81),a
	ld a,(l1a8a)
	ld (l1a87),a
	ld a,(l1a8d)
.l1fed
	ld (l1a60),a
	ld a,(l1a5a)
	or a
	jp z,l2010
	ld a,(l1a72)
	ld (l1a75),a
	or a
	ld a,(l1a6a)
	jp z,l2007
	ld a,(l1a6b)
.l2007
	ld (l1a78),a
	ld a,(l1a66)
	ld (l1a5d),a
.l2010
	ld a,(l1a4b)
	or a
	jp z,l2035
	ld (l1a96),a
	ld a,(l1a99)
	ld (l1a9c),a
	call l2290
	ld a,(l1a91)
	ld c,a
	ld a,#02
	call l269e
	ld a,(l1a92)
	ld c,a
	ld a,#03
	call l269e
.l2035
	ld a,(l1a31)
	or a
	ret p
	ld a,(l1a76)
	or a
	jp nz,l2064
	ld hl,l1a79
	dec (hl)
	jp p,l208a
	ld a,(l1a6c)
	ld (hl),a
	ld hl,l1a5e
	inc (hl)
	ld a,(hl)
	cp #0f
	jp nz,l208a
	ld a,#01
	ld (l1a76),a
	ld a,(l1a6d)
	ld (l1a79),a
	jp l208a
.l2064
	cp #01
	jp nz,l208a
	ld hl,l1a79
	dec (hl)
	jp p,l208a
	ld a,(l1a6d)
	ld (hl),a
	ld a,(l1a5e)
	ld hl,l1a70
	cp (hl)
	jp z,l2085
	dec a
	ld (l1a5e),a
	jp p,l208a
.l2085
	ld a,#02
	ld (l1a76),a
.l208a
	ld a,(l1a5e)
	ld c,a
	ld a,#0a
	call l269e
	ld a,(l1a4c)
	or a
	jp z,l20c3
	ld a,(l1a97)
	or a
	jp z,l20c3
	dec a
	ld (l1a97),a
	jp nz,l2193
	ld a,(l1a2d)
	ld c,a
	ld a,#04
	call l269e
	ld a,(l1a2e)
	ld c,a
	ld a,#05
	call l269e
	ld a,(l1aa0)
	ld (l1a9d),a
	call l2290
.l20c3
	ld a,(l1a49)
	or a
	jp z,l2117
	ld a,(l1a82)
	or a
	jp z,l20d8
	dec a
	ld (l1a82),a
	jp nz,l2117
.l20d8
	ld hl,(l1a2d)
	ld de,(l1a85)
	ld d,#00
	ld a,(l1a61)
	or a
	jp z,l20ec
	add hl,de
	jp l20ee
.l20ec
	sbc hl,de
.l20ee
	ld (l1a2d),hl
	ld c,l
	ld a,#04
	call l269e
	ld c,h
	ld a,#05
	call l269e
	ld hl,l1a88
	dec (hl)
	jp nz,l214d
	ld a,(l1a8b)
	or a
	jp z,l214d
	add a
	ld (hl),a
	ld a,(l1a61)
	cpl
	ld (l1a61),a
	jp l214d
.l2117
	ld a,(l1a3d)
	or a
	jp z,l214d
	dec a
	ld (l1a3d),a
	jp nz,l214d
	ld a,(l1a40)
	ld (l1a3d),a
	ld a,(l1a7c)
	ld l,a
	ld a,(l1a61)
	xor #ff
	ld (l1a61),a
	ld a,(l1a64)
	jp z,l2141
	add l
	jp l2170
.l2141
	sub l
	push af
	ld a,(l1a43)
	ld (l1a3d),a
	pop af
	jp l2170
.l214d
	ld a,(l1a46)
	or a
	jp z,l2193
	ld hl,l1a7f
	ld e,a
	ld a,(l1a64)
	cp (hl)
	jp z,l2193
	jp c,l216a
	sub e
	cp (hl)
	jp nc,l2170
	jp l216f
.l216a
	add e
	cp (hl)
	jp c,l2170
.l216f
	ld a,(hl)
.l2170
	ld (l1a64),a
	add a
	ld e,a
	ld d,#00
	ld hl,l26bc
	add hl,de
	ld e,(hl)
	inc hl
	ld d,(hl)
	ld hl,(l1a52)
	ld h,#00
	add hl,de
	ld (l1a2d),hl
	ld c,l
	ld a,#04
	call l269e
	ld c,h
	ld a,#05
	call l269e
.l2193
	ld hl,l1a55
	dec (hl)
	push af
	ld a,(l1aa3)
	cp (hl)
	ld hl,l1aa6
	jr z,l21a6
	ld a,(hl)
	or a
	jp nz,l21af
.l21a6
	ld a,#24
	ld (l1a9d),a
	call l2290
	inc (hl)
.l21af
	dec (hl)
	pop af
	ret nz
	ld bc,(l1a21)
.l21b6
	ld a,(bc)
	inc bc
	or a
	jp p,l21cb
	and #7f
	add a
	ld e,a
	ld d,#00
	ld hl,l2559
	add hl,de
	ld e,(hl)
	inc hl
	ld d,(hl)
	ex de,hl
	jp (hl)
.l21cb
	ld l,a
	ld a,(l1a3a)
	or a
	jp z,l21da
	xor a
	ld (l1a3a),a
	jp l21dd
.l21da
	ld a,(l1a34)
.l21dd
	add l
	ld l,a
	ld a,(l1a46)
	or a
	ld a,l
	jp z,l21ed
	ld (l1a7f),a
	ld a,(l1a64)
.l21ed
	ld (l1a64),a
	add a
	push bc
	ld e,a
	ld d,#00
	ld hl,l26bc
	add hl,de
	ld e,(hl)
	inc hl
	ld d,(hl)
	ld hl,(l1a52)
	ld h,#00
	add hl,de
	ld (l1a2d),hl
	ld c,l
	ld a,#04
	call l269e
	ld c,h
	ld a,#05
	call l269e
	pop bc
	ld a,(l1a37)
	or a
	jp nz,l221b
	ld a,(bc)
	inc bc
.l221b
	ld (l1a55),a
	ld (l1a21),bc
	ld a,(l1a40)
	ld (l1a3d),a
	ld a,(l1aa9)
	ld (l1aa6),a
	ld a,(l1aa0)
	ld (l1a9d),a
	call l2290
	ld a,(l1a49)
	or a
	jp z,l224a
	ld (l1a82),a
	ld a,(l1a8b)
	ld (l1a88),a
	ld a,(l1a8e)
.l224a
	ld (l1a61),a
	ld a,(l1a5b)
	or a
	jp z,l226d
	ld a,(l1a73)
	ld (l1a76),a
	or a
	ld a,(l1a6c)
	jp z,l2264
	ld a,(l1a6d)
.l2264
	ld (l1a79),a
	ld a,(l1a67)
	ld (l1a5e),a
.l226d
	ld a,(l1a4c)
	or a
	ret z
	ld (l1a97),a
	ld a,(l1a9a)
	ld (l1a9d),a
	call l2290
	ld a,(l1a93)
	ld c,a
	ld a,#04
	call l269e
	ld a,(l1a94)
	ld c,a
	ld a,#05
	jp l269e
.l2290
	ld a,(l1a9b)
	and #09
	ld c,a
	ld a,(l1a9c)
	and #12
	ld b,a
	ld a,(l1a9d)
	and #24
	or c
	or b
	ld c,a
	ld a,#07
	jp l269e
	push hl
	ld hl,l1a9b
	ld a,(hl)
	inc hl
	or (hl)
	inc hl
	or (hl)
	pop hl
	ld c,a
	ld a,#07
	jp l269e
.l22b9                                  ; data !!!
	rst #18
	ld (l22eb),hl
	ld sp,hl
	ld (l2301),hl
	ld (de),a
	inc hl
	daa
	inc hl
	inc a
	inc hl
	ld b,h
	inc hl
	ld c,h
	inc hl
	ld l,(hl)
	inc hl
	sbc b
	inc hl
	and b
	inc hl
	or d
	inc hl
	cp d
	inc hl
	pop de
	inc hl
	exx
	inc hl
	ex af,af'
	inc hl
	ret m
	inc hl
	ret p
	inc hl
	ld a,(bc)
	ld (l1a4d),a
	inc bc
	ld (l1a23),bc
	jp l1cfa
.l22eb
	ld hl,l1a4d
	dec (hl)
	jp z,l1cfa
	ld bc,(l1a23)
	jp l1cfa
	ld a,(bc)
	ld (l1a35),a
	inc bc
	jp l1cfa
.l2301
	ld hl,l1a2f
	inc (hl)
	jp l1dd4
	ld a,(bc)
	ld l,a
	inc bc
	ld a,(bc)
	ld h,a
	push hl
	pop bc
	jp l1cfa
	ld a,(bc)
	ld l,a
	inc bc
	ld a,(bc)
	ld h,a
	inc bc
	push hl
	ld hl,(l2334)
	ld (hl),c
	inc hl
	ld (hl),b
	inc hl
	ld (l2334),hl
	pop bc
	jp l1cfa
	ld hl,(l2334)
	dec hl
	ld b,(hl)
	dec hl
	ld c,(hl)
	ld (l2334),hl
	jp l1cfa
.l2336 equ $ + 2
.l2334
	db #00,#00,#00,#00,#00,#00,#00,#00
	ld a,(bc)
	ld (l1a32),a
	inc bc
	jp l1cfa
	ld a,(bc)
	ld (l1a50),a
	inc bc
	jp l1cfa
	ld a,(bc)
	ld l,a
	inc bc
	ld a,(bc)
	inc bc
	push bc
	ld c,a
	ld a,l
	cp #07
	jp nz,l2367
	ld a,c
	ld (l1a9b),a
	ld (l1a9e),a
	call l2290
	pop bc
	jp l1cfa
.l2367
	call l269e
	pop bc
	jp l1cfa
	ld a,(bc)
	rra
	rra
	rra
	rra
	and #0f
	ld (l1a65),a
	ld a,(bc)
	and #0f
	ld (l1a6e),a
	inc bc
	ld a,(bc)
	rra
	rra
	rra
	rra
	and #0f
	ld (l1a68),a
	ld a,(bc)
	and #0f
	ld (l1a69),a
	inc bc
	ld a,(bc)
	ld (l1a71),a
	inc bc
	jp l1cfa
	ld a,(bc)
	ld (l1a59),a
	inc bc
	jp l1cfa
	ld a,(bc)
	ld (l1a7a),a
	inc bc
	ld a,(bc)
	ld (l1a3e),a
	inc bc
	ld a,(bc)
	ld (l1a41),a
	inc bc
	jp l1cfa
	ld a,(bc)
	ld (l1a44),a
	inc bc
	jp l1cfa
	ld a,(bc)
	ld (l1a47),a
	inc bc
	ld a,(bc)
	ld (l1a83),a
	inc bc
	ld a,(bc)
	ld (l1a89),a
	inc bc
	ld a,(bc)
	ld (l1a8c),a
	inc bc
	jp l1cfa
	ld a,#ff
	ld (l1a38),a
	jp l1cfa
	ld a,(bc)
	ld (l1a4a),a
	inc bc
	ld a,(bc)
	ld (l1a98),a
	inc bc
	ld a,(bc)
	ld (l1a8f),a
	inc bc
	ld a,(bc)
	ld (l1a90),a
	inc bc
	jp l1cfa
	ld a,(bc)
	ld (l1aa1),a
	inc bc
	jp l1cfa
	ld a,(bc)
	ld (l1aa7),a
	inc bc
	jp l1cfa
.l2400
	dw l2426,l2432,l2440,l2448
	dw l2459,l246e,l2483,l248b
	dw l2493,l24b5,l24df,l24e7
	dw l24f9,l2501,l2518,l2520
	dw l244f,l2551,l2549
.l2426
	ld a,(bc)
	ld (l1a4e),a
	inc bc
	ld (l1a25),bc
	jp l1f59
.l2432
	ld hl,l1a4e
	dec (hl)
	jp z,l1f59
	ld bc,(l1a25)
	jp l1f59
.l2440
	ld a,(bc)
	ld (l1a36),a
	inc bc
	jp l1f59
.l2448
	ld hl,l1a30
	inc (hl)
	jp l2035
.l244f
	ld a,(bc)
	ld l,a
	inc bc
	ld a,(bc)
	ld h,a
	push hl
	pop bc
	jp l1f59
.l2459
	ld a,(bc)
	ld l,a
	inc bc
	ld a,(bc)
	ld h,a
	inc bc
	push hl
	ld hl,(l247b)
	ld (hl),c
	inc hl
	ld (hl),b
	inc hl
	ld (l247b),hl
	pop bc
	jp l1f59
.l246e
	ld hl,(l247b)
	dec hl
	ld b,(hl)
	dec hl
	ld c,(hl)
	ld (l247b),hl
	jp l1f59
.l247b
	nop
	nop
.l247d
	nop
	nop
	nop
	nop
	nop
	nop
.l2483
	ld a,(bc)
	ld (l1a33),a
	inc bc
	jp l1f59
.l248b
	ld a,(bc)
	ld (l1a51),a
	inc bc
	jp l1f59
.l2493
	ld a,(bc)
	ld l,a
	inc bc
	ld a,(bc)
	inc bc
	push bc
	ld c,a
	ld a,l
	cp #07
	jp nz,l24ae
	ld a,c
	ld (l1a9c),a
	ld (l1a9f),a
	call l2290
	pop bc
	jp l1f59
.l24ae
	call l269e
	pop bc
	jp l1f59
.l24b5
	ld a,(bc)
	rra
	rra
	rra
	rra
	and #0f
	ld (l1a66),a
	ld a,(bc)
	and #0f
	ld (l1a6f),a
	inc bc
	ld a,(bc)
	rra
	rra
	rra
	rra
	and #0f
	ld (l1a6a),a
	ld a,(bc)
	and #0f
	ld (l1a6b),a
	inc bc
	ld a,(bc)
	ld (l1a72),a
	inc bc
	jp l1f59
.l24df
	ld a,(bc)
	ld (l1a5a),a
	inc bc
	jp l1f59
.l24e7
	ld a,(bc)
	ld (l1a7b),a
	inc bc
	ld a,(bc)
	ld (l1a3f),a
	inc bc
	ld a,(bc)
	ld (l1a42),a
	inc bc
	jp l1f59
.l24f9
	ld a,(bc)
	ld (l1a45),a
	inc bc
	jp l1f59
.l2501
	ld a,(bc)
	ld (l1a48),a
	inc bc
	ld a,(bc)
	ld (l1a84),a
	inc bc
	ld a,(bc)
	ld (l1a8a),a
	inc bc
	ld a,(bc)
	ld (l1a8d),a
	inc bc
	jp l1f59
.l2518
	ld a,#ff
	ld (l1a39),a
	jp l1f59
.l2520
	ld a,(bc)
	ld (l1a4b),a
	inc bc
	or a
	jp nz,l2537
	push bc
	ld a,(l1a9f)
	ld (l1a9c),a
	call l2290
	pop bc
	jp l1f59
.l2537
	ld a,(bc)
	ld (l1a99),a
	inc bc
	ld a,(bc)
	ld (l1a91),a
	inc bc
	ld a,(bc)
	ld (l1a92),a
	inc bc
	jp l1f59
.l2549
	ld a,(bc)
	ld (l1aa2),a
	inc bc
	jp l1f59
.l2551
	ld a,(bc)
	ld (l1aa8),a
	inc bc
	jp l1f59
.l2559
	dw #257f,#258b,#2599,#25a1
	dw #25b0,#25c5,#25da,#25e2
	dw #25ea,#260c,#2636,#263e
	dw #2650,#2658,#266f,#2677
	dw #25a6,#2696,#268e
	ld a,(bc)
	ld (l1a4f),a
	inc bc
	ld (l1a27),bc
	jp l21b6
	ld hl,l1a4f
	dec (hl)
	jp z,l21b6
	ld bc,(l1a27)
	jp l21b6
	ld a,(bc)
	ld (l1a37),a
	inc bc
	jp l21b6
	ld hl,l1a31
	inc (hl)
	ret
	ld a,(bc)
	ld l,a
	inc bc
	ld a,(bc)
	ld h,a
	push hl
	pop bc
	jp l21b6
	ld a,(bc)
	ld l,a
	inc bc
	ld a,(bc)
	ld h,a
	inc bc
	push hl
	ld hl,(l25d2)
	ld (hl),c
	inc hl
	ld (hl),b
	inc hl
	ld (l25d2),hl
	pop bc
	jp l21b6
	ld hl,(l25d2)
	dec hl
	ld b,(hl)
	dec hl
	ld c,(hl)
	ld (l25d2),hl
	jp l21b6
.l25d2
	nop
	nop
.l25d4
	nop
	nop
	nop
	nop
	nop
	nop
	ld a,(bc)
	ld (l1a34),a
	inc bc
	jp l21b6
	ld a,(bc)
	ld (l1a52),a
	inc bc
	jp l21b6
	ld a,(bc)
	ld l,a
	inc bc
	ld a,(bc)
	inc bc
	push bc
	ld c,a
	ld a,l
	cp #07
	jp nz,l2605
	ld a,c
	ld (l1a9d),a
	ld (l1aa0),a
	call l2290
	pop bc
	jp l21b6
.l2605
	call l269e
	pop bc
	jp l21b6
	ld a,(bc)
	rra
	rra
	rra
	rra
	and #0f
	ld (l1a67),a
	ld a,(bc)
	and #0f
	ld (l1a70),a
	inc bc
	ld a,(bc)
	rra
	rra
	rra
	rra
	and #0f
	ld (l1a6c),a
	ld a,(bc)
	and #0f
	ld (l1a6d),a
	inc bc
	ld a,(bc)
	ld (l1a73),a
	inc bc
	jp l21b6
	ld a,(bc)
	ld (l1a5b),a
	inc bc
	jp l21b6
	ld a,(bc)
	ld (l1a7c),a
	inc bc
	ld a,(bc)
	ld (l1a40),a
	inc bc
	ld a,(bc)
	ld (l1a43),a
	inc bc
	jp l21b6
	ld a,(bc)
	ld (l1a46),a
	inc bc
	jp l21b6
	ld a,(bc)
	ld (l1a49),a
	inc bc
	ld a,(bc)
	ld (l1a85),a
	inc bc
	ld a,(bc)
	ld (l1a8b),a
	inc bc
	ld a,(bc)
	ld (l1a8e),a
	inc bc
	jp l21b6
	ld a,#ff
	ld (l1a3a),a
	jp l21b6
	ld a,(bc)
	ld (l1a4c),a
	inc bc
	ld a,(bc)
	ld (l1a9a),a
	inc bc
	ld a,(bc)
	ld (l1a93),a
	inc bc
	ld a,(bc)
	ld (l1a94),a
	inc bc
	jp l21b6
	ld a,(bc)
	ld (l1aa3),a
	inc bc
	jp l21b6
	ld a,(bc)
	ld (l1aa9),a
	inc bc
	jp l21b6
.l269e
	ld b,#f4
	out (c),a
	ld b,#f6
	in a,(c)
	or #c0
	out (c),a
	and #3f
	out (c),a
	ld b,#f4
	out (c),c
	ld b,#f6
	ld c,a
	or #80
	out (c),a
	out (c),c
	ret
.l26bc
	dw #0968,#08e1,#0861,#07e9
	dw #0777,#070c,#06a7,#0647
	dw #05ed,#0598,#0547,#04fc
	dw #04b4,#0470,#0431,#03f4
	dw #03bc,#0386,#0353,#0324
	dw #02f6,#02cc,#02a4,#027e
	dw #025a,#0238,#0218,#01fa
	dw #01de,#01c3,#01aa,#0192
	dw #017b,#0166,#0152,#013f
	dw #012d,#011c,#010c,#00fd
	dw #00ef,#00e1,#00d5,#00c9
	dw #00be,#00b3,#00a9,#009f
	dw #0096,#008e,#0086,#007f
	dw #0077,#0071,#006a,#0064
	dw #005f,#0059,#0054,#0050
	dw #004b,#0047,#0043,#003f
	dw #003c,#0038,#0035,#0032
	dw #002f,#002d,#002a,#0028
	dw #0026,#0024,#0022,#0020
	dw #001e,#001c,#001b,#0019
	dw #0018,#0016,#0015,#0014
	dw #0013,#0012,#0011,#0010
	dw #0010,#0010,#0010,#0010
.l2778 equ $ + 4
.l2774
	dw l297f,l2ebf,l29eb,l2edb
.l2780 equ $ + 4
.l277c
	dw l2baa,l2ef9,l278e,l2795
	dw l2799,l279d,l27a1,l27a5
	dw l27a9
.l2795 equ $ + 7
.l278e
	db #00,#ad,#27,#02,#f9,#27,#ff,#00
.l279d equ $ + 7
.l2799 equ $ + 3
	db #14,#28,#ff,#00,#4a,#28,#ff,#00
.l27a5 equ $ + 7
.l27a1 equ $ + 3
	db #80,#28,#ff,#00,#b6,#28,#ff,#04
.l27a9 equ $ + 3
	db #12,#29,#ff,#04,#38,#29,#ff,#8d
	db #00,#00,#00,#00,#91,#ff,#92,#ff
	db #8a,#01,#88,#07,#01,#89,#f0,#01
	db #01,#88,#06,#1f,#32,#04,#88,#06
	db #0a,#32,#03,#8a,#00,#88,#06,#0c
	db #32,#03,#88,#06,#0e,#32,#03,#88
	db #06,#0f,#32,#03,#88,#06,#10,#32
	db #03,#88,#06,#11,#32,#03,#88,#06
	db #12,#32,#03,#88,#06,#13,#32,#03
	db #88,#06,#14,#32,#03,#88,#06,#15
	db #32,#03,#83,#8d,#01,#01,#00,#01
	db #91,#ff,#92,#ff,#8a,#01,#89,#00
	db #00,#01,#32,#06,#88,#07,#10,#89
	db #a0,#02,#01,#50,#40,#83,#8d,#00
	db #00,#00,#00,#91,#ff,#92,#ff,#8a
	db #01,#88,#07,#01,#89,#f0,#02,#01
	db #88,#06,#07,#32,#02,#8a,#00,#80
	db #08,#88,#06,#1e,#32,#02,#88,#06
	db #1b,#32,#02,#88,#06,#18,#32,#02
	db #88,#06,#15,#32,#02,#88,#06,#11
	db #32,#02,#81,#83,#8d,#00,#00,#00
	db #00,#91,#ff,#92,#ff,#8a,#01,#88
	db #07,#01,#89,#f0,#04,#01,#88,#06
	db #07,#32,#02,#8a,#00,#80,#08,#88
	db #06,#1e,#32,#03,#88,#06,#1b,#32
	db #03,#88,#06,#18,#32,#03,#88,#06
	db #15,#32,#03,#88,#06,#11,#32,#03
	db #81,#83,#8d,#00,#00,#00,#00,#91
	db #ff,#92,#ff,#8a,#01,#88,#07,#01
	db #89,#f0,#07,#01,#88,#06,#07,#32
	db #02,#8a,#00,#80,#0b,#88,#06,#1e
	db #32,#05,#88,#06,#1b,#32,#05,#88
	db #06,#18,#32,#05,#88,#06,#15,#32
	db #05,#88,#06,#11,#32,#05,#81,#83
	db #8d,#00,#00,#00,#00,#91,#ff,#92
	db #ff,#8a,#01,#88,#07,#01,#89,#f0
	db #00,#01,#80,#06,#88,#06,#05,#32
	db #01,#88,#06,#0b,#32,#01,#88,#06
	db #17,#32,#01,#88,#06,#1e,#32,#01
	db #81,#89,#f0,#04,#01,#88,#06,#07
	db #32,#02,#8a,#00,#88,#06,#0a,#32
	db #02,#80,#08,#88,#06,#11,#32,#03
	db #88,#06,#15,#32,#03,#88,#06,#18
	db #32,#03,#88,#06,#1b,#32,#03,#88
	db #06,#1e,#32,#03,#81,#89,#00,#00
	db #01,#32,#06,#83,#8d,#00,#00,#00
	db #00,#91,#ff,#92,#ff,#8a,#01,#88
	db #07,#20,#89,#e0,#04,#01,#8b,#0c
	db #02,#ff,#82,#03,#80,#08,#44,#8a
	db #00,#3f,#3c,#3f,#46,#41,#3e,#41
	db #81,#83,#8d,#00,#00,#00,#00,#91
	db #ff,#92,#ff,#8a,#01,#82,#01,#88
	db #07,#20,#8b,#00,#00,#00,#89,#ed
	db #00,#02,#3c,#3d,#3e,#3f,#40,#41
	db #42,#89,#a9,#00,#02,#3c,#3d,#3e
	db #3f,#40,#41,#42,#89,#65,#00,#02
	db #3c,#3d,#3e,#3f,#40,#41,#42,#89
	db #21,#00,#02,#3c,#3d,#3e,#3f,#40
	db #41,#42,#89,#00,#00,#02,#40,#83
.l297f equ $ + 1
	db #83,#91,#ff,#92,#ff,#8a,#01,#89
	db #d0,#00,#01,#88,#07,#08,#8d,#01
	db #08,#02,#00,#88,#06,#07,#8f,#01
	db #01,#01,#01,#80,#04,#86,#00,#84
	db #21,#2d,#84,#21,#2d,#84,#21,#2d
	db #84,#21,#2d,#86,#08,#84,#40,#2d
	db #86,#07,#84,#40,#2d,#86,#05,#84
	db #40,#2d,#86,#07,#84,#40,#2d,#81
	db #80,#02,#86,#00,#84,#5f,#2d,#84
	db #5f,#2d,#86,#fe,#84,#5f,#2d,#84
	db #5f,#2d,#81,#80,#02,#86,#00,#84
	db #21,#2d,#84,#21,#2d,#86,#05,#84
	db #21,#2d,#86,#fb,#84,#21,#2d,#81
.l29eb equ $ + 5
	db #86,#00,#90,#83,#29,#91,#ff,#92
	db #ff,#8a,#01,#82,#01,#88,#07,#10
	db #89,#a0,#0a,#01,#86,#03,#84,#be
	db #2d,#86,#fe,#84,#ac,#2d,#86,#05
	db #84,#d0,#2d,#84,#be,#2d,#86,#08
	db #84,#d0,#2d,#86,#fe,#84,#ac,#2d
	db #86,#05,#84,#d0,#2d,#86,#f9,#84
	db #ac,#2d,#82,#00,#89,#30,#60,#00
	db #8d,#05,#02,#03,#00,#86,#f4,#41
	db #50,#89,#bb,#00,#01,#91,#05,#3f
	db #05,#40,#0a,#3f,#0a,#3d,#0a,#3f
	db #0a,#40,#0a,#91,#0a,#3f,#05,#3d
	db #0a,#3a,#0a,#3d,#14,#44,#01,#45
	db #01,#46,#08,#44,#05,#41,#05,#44
	db #0a,#41,#05,#3f,#05,#41,#0a,#3f
	db #05,#3d,#05,#91,#ff,#8c,#02,#8d
	db #0f,#02,#00,#01,#52,#50,#8d,#05
	db #01,#03,#00,#82,#05,#8d,#05,#01
	db #03,#00,#8c,#00,#49,#4b,#46,#4b
	db #49,#46,#4b,#49,#46,#4b,#49,#46
	db #4b,#49,#46,#50,#4d,#4c,#4b,#4c
	db #4d,#50,#4b,#4c,#82,#28,#4d,#82
	db #05,#52,#51,#50,#4f,#4e,#4d,#4c
	db #4b,#49,#46,#44,#45,#82,#00,#46
	db #0a,#44,#05,#41,#05,#82,#14,#40
	db #3f,#3d,#3f,#86,#00,#82,#00,#3a
	db #28,#91,#1e,#8d,#14,#01,#00,#00
	db #3d,#28,#8d,#0f,#01,#03,#00,#80
	db #05,#3f,#05,#3d,#05,#3a,#05,#81
	db #91,#28,#3d,#05,#3a,#28,#91,#1e
	db #8d,#14,#01,#00,#00,#3d,#28,#8d
	db #0f,#01,#03,#00,#80,#02,#3f,#05
	db #3d,#05,#3c,#05,#81,#80,#03,#3f
	db #05,#3d,#05,#3a,#05,#81,#8c,#02
	db #86,#f4,#3d,#05,#41,#0a,#3d,#0a
	db #3a,#0a,#46,#1e,#49,#14,#48,#0a
	db #49,#0a,#48,#0a,#44,#0a,#3f,#14
	db #44,#14,#46,#14,#44,#0a,#46,#14
	db #48,#0a,#49,#14,#91,#ff,#80,#06
	db #4d,#05,#4e,#05,#81,#8d,#01,#05
	db #00,#01,#4d,#14,#8d,#00,#00,#00
	db #00,#8c,#00,#86,#f4,#82,#0a,#89
	db #c0,#01,#01,#80,#04,#41,#48,#4d
	db #48,#81,#89,#bb,#00,#01,#8c,#02
	db #84,#e9,#2c,#41,#05,#82,#04,#8c
	db #00,#80,#02,#89,#b0,#0c,#01,#8b
	db #05,#02,#02,#86,#fb,#84,#b7,#2c
	db #89,#30,#a0,#00,#86,#07,#84,#b7
	db #2c,#89,#b0,#0c,#01,#8b,#0c,#02
	db #02,#86,#f2,#84,#d0,#2c,#89,#30
	db #a0,#00,#86,#fe,#84,#d0,#2c,#81
	db #89,#b0,#0f,#01,#80,#02,#8b,#05
	db #02,#02,#86,#fb,#84,#b7,#2c,#86
	db #f9,#84,#b7,#2c,#8b,#07,#02,#02
	db #86,#f5,#84,#b7,#2c,#86,#f2,#84
	db #b7,#2c,#81,#86,#00,#8b,#00,#00
.l2baa equ $ + 4
	db #00,#90,#ef,#29,#91,#ff,#92,#ff
	db #8a,#01,#82,#02,#88,#07,#20,#89
	db #a0,#0a,#01,#86,#03,#84,#c7,#2d
	db #86,#fe,#84,#b5,#2d,#86,#05,#84
	db #d9,#2d,#84,#c7,#2d,#86,#08,#84
	db #d9,#2d,#86,#fe,#84,#b5,#2d,#86
	db #05,#84,#d9,#2d,#86,#f9,#84,#b5
	db #2d,#86,#f7,#8b,#0c,#01,#ff,#89
	db #90,#0a,#01,#82,#02,#80,#02,#86
	db #f7,#8a,#01,#84,#0d,#2e,#8a,#01
	db #84,#0d,#2e,#86,#f9,#8a,#01,#84
	db #0d,#2e,#8a,#01,#84,#0d,#2e,#86
	db #f7,#8a,#01,#84,#0d,#2e,#8a,#01
	db #84,#0d,#2e,#86,#fa,#8a,#01,#84
	db #0d,#2e,#86,#f9,#8a,#01,#84,#0d
	db #2e,#86,#f7,#8a,#01,#84,#0d,#2e
	db #8a,#01,#84,#0d,#2e,#86,#fe,#8a
	db #01,#84,#4f,#2e,#8a,#01,#84,#4f
	db #2e,#86,#05,#8a,#01,#84,#a8,#2e
	db #8a,#01,#84,#a8,#2e,#86,#f9,#8a
	db #01,#84,#0d,#2e,#86,#fb,#8a,#01
	db #84,#0d,#2e,#81,#82,#00,#8a,#01
	db #8b,#00,#00,#00,#86,#f4,#89,#00
	db #00,#01,#32,#05,#82,#0a,#89,#c0
	db #01,#01,#80,#04,#46,#49,#4b,#49
	db #81,#8c,#02,#89,#aa,#00,#01,#84
	db #e9,#2c,#86,#00,#82,#a0,#8d,#08
	db #01,#02,#00,#8c,#00,#89,#77,#00
	db #01,#80,#04,#46,#8c,#01,#4d,#81
	db #82,#00,#8c,#00,#8d,#00,#00,#00
	db #00,#90,#ae,#2b,#80,#08,#45,#4a
	db #4d,#51,#81,#80,#08,#46,#48,#4b
	db #4f,#81,#80,#08,#47,#4b,#4e,#52
	db #81,#80,#08,#46,#48,#4b,#4f,#81
	db #85,#3a,#8a,#00,#3e,#41,#3a,#3e
	db #41,#3a,#3e,#41,#3a,#3e,#41,#3a
	db #3e,#41,#3a,#3e,#41,#3a,#3e,#8a
	db #01,#85,#38,#8a,#00,#3c,#3e,#41
	db #38,#3c,#3e,#41,#38,#3c,#3e,#41
	db #38,#3c,#3e,#41,#38,#3c,#38,#3c
	db #8a,#01,#85,#8d,#0a,#02,#02,#00
	db #41,#46,#48,#49,#4d,#4b,#48,#49
	db #41,#46,#48,#49,#4d,#4e,#4d,#49
	db #82,#00,#46,#14,#48,#0a,#49,#14
	db #4b,#0a,#4d,#14,#4b,#14,#48,#14
	db #44,#14,#41,#14,#49,#14,#48,#0a
	db #46,#14,#48,#0a,#49,#14,#4d,#28
	db #41,#23,#85,#14,#05,#16,#05,#16
	db #05,#0a,#05,#84,#8a,#2d,#0a,#05
	db #11,#05,#14,#05,#16,#05,#16,#05
	db #0a,#05,#84,#8a,#2d,#0a,#05,#19
	db #05,#85,#0a,#05,#16,#05,#16,#05
	db #0a,#05,#84,#8a,#2d,#0a,#05,#11
	db #05,#16,#05,#0a,#05,#16,#05,#0a
	db #05,#84,#8a,#2d,#0a,#05,#11,#05
	db #85,#0a,#05,#16,#05,#88,#07,#09
	db #0a,#05,#0a,#05,#84,#8a,#2d,#88
	db #07,#09,#0a,#05,#0a,#05,#88,#07
	db #08,#16,#05,#88,#07,#09,#0a,#05
	db #0a,#05,#0a,#05,#84,#8a,#2d,#16
	db #05,#11,#05,#85,#89,#d0,#01,#01
	db #88,#06,#09,#88,#07,#00,#8e,#8d
	db #01,#28,#00,#01,#27,#0a,#89,#d0
	db #00,#01,#8d,#01,#08,#02,#00,#88
	db #06,#07,#88,#07,#08,#85,#84,#e2
	db #2d,#84,#e2,#2d,#8a,#01,#85,#84
	db #0d,#2e,#84,#0d,#2e,#8a,#01,#85
	db #84,#24,#2e,#84,#24,#2e,#8a,#01
	db #85,#84,#4f,#2e,#84,#4f,#2e,#8a
	db #01,#85,#84,#66,#2e,#84,#66,#2e
	db #8a,#01,#85,#84,#91,#2e,#84,#91
	db #2e,#8a,#01,#85,#35,#8a,#00,#3a
	db #3e,#35,#3a,#3e,#35,#3a,#3e,#35
	db #3a,#3e,#35,#3a,#3e,#35,#3a,#3e
	db #35,#3a,#3e,#35,#3a,#3e,#35,#3a
	db #3e,#35,#3a,#3e,#35,#3a,#3e,#35
	db #3a,#3e,#35,#3a,#3e,#35,#85,#3e
	db #8a,#00,#3a,#35,#3e,#3a,#35,#3e
	db #3a,#35,#3e,#3a,#35,#3e,#3a,#35
	db #3e,#3a,#35,#3e,#3a,#85,#35,#8a
	db #00,#3a,#32,#35,#3a,#32,#35,#3a
	db #32,#35,#3a,#32,#35,#3a,#32,#35
	db #3a,#32,#35,#3a,#32,#35,#3a,#32
	db #35,#3a,#32,#35,#3a,#32,#35,#3a
	db #32,#35,#3a,#32,#35,#3a,#32,#35
	db #85,#32,#8a,#00,#3a,#35,#32,#3a
	db #35,#32,#3a,#35,#32,#3a,#35,#32
	db #3a,#35,#32,#3a,#35,#32,#3a,#85
	db #35,#8a,#00,#2e,#32,#35,#2e,#32
	db #35,#2e,#32,#35,#2e,#32,#35,#2e
	db #32,#35,#2e,#32,#35,#2e,#32,#35
	db #2e,#32,#35,#2e,#32,#35,#2e,#32
	db #35,#2e,#32,#35,#2e,#32,#35,#2e
	db #32,#35,#85,#32,#8a,#00,#2e,#35
	db #32,#2e,#35,#32,#2e,#35,#32,#2e
	db #35,#32,#2e,#35,#32,#2e,#35,#32
	db #2e,#85,#31,#8a,#00,#2c,#29,#31
	db #30,#29,#31,#2c,#29,#31,#30,#29
	db #31,#2c,#29,#31,#30,#29
.l2ebf equ $ + 3
	db #31,#2c,#85,#91,#ff,#92,#ff,#8a
	db #01,#89,#ee,#00,#02,#88,#07,#08
	db #5c,#01,#8c,#01,#0f,#c0,#8c,#00
.l2edb equ $ + 7
	db #89,#e0,#01,#01,#0f,#40,#83,#91
	db #ff,#92,#ff,#8a,#01,#89,#ee,#00
	db #02,#88,#07,#10,#87,#08,#5c,#01
	db #8c,#01,#0f,#c0,#8c,#00,#89,#e0
.l2ef9 equ $ + 5
	db #01,#01,#0f,#40,#83,#91,#ff,#92
	db #ff,#8a,#01,#89,#ee,#00,#02,#88
	db #07,#20,#87,#0e,#5c,#01,#8c,#01
	db #0f,#a0,#8c,#00,#88,#07,#04,#90
	db #c4,#28,#83,#14,#0c,#12,#15,#00
	db #00,#00,#00,#00,#00,#00,#00,#00

.game_name
	db "Solar Invasion",0
.game_year
	db "1990",0
.game_publisher
	db "Mastertronic",0
.music_author
	db "Timothy Follin",0
.music_comment
	db "",0

	read "music_end_v1_0.asm"
